home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 4 / 64er_Magazin_Sonderheft_04_86-04_1986_Markt__Technik_de_Disk_1_of_2_Side_A.d64 / listing 12.d (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  216b  |  10 lines
  1. 10 rem d$(1)-d$(sz) als seq-file -----------------------------------------------
  2. 20 gosub10000: rem tabelle deffinieren
  3. 30 open2,8,2,"daten-file,s,w"
  4. 40 fori=1tosz
  5. 50 :print#2,d$(i)
  6. 60 nexti
  7. 65 close2
  8. 70 print"*** fertig ***"
  9. 80 end
  10.